﻿Public Class PedidoNegocio

    Public Function listar() As Collection
        Dim dao As New PedidoDAO
        Return dao.listar()
    End Function

    Public Function insertar(ByVal idPaquete As Integer, ByVal idUsuario As String, ByVal descripcion As String) As Pedido

        Dim omen As New Pedido()
        omen.idpaquete = idPaquete
        omen.idUsuario = idUsuario
        omen.descripcion = descripcion

        Dim dao As New PedidoDAO
        Return dao.insertar(omen)
    End Function



End Class
